use dataset_representation, clear

#delimit;

gr tw 
	(sc cong vot, jitter(5) msym(O) col(gray) msize(vsmall))
	(qfit cong vot, col(black))
	,
		by(official_g, legend(off) note(""))
		legend(off)
		subtitle(, fcol(none) lwid(none))
		plotregion(style(none))
		ylab(0 1, angle(horiz))
		xlab(0(25)100)
		xtitle("Voter liberalism (%)")
		ytitle("Congruent")
		;
		
#delimit cr

gr export "_output/figure 5.pdf", replace
